CAAIlluminatedFraction_NeptuneMagnitudeMuller <-
function(r, Delta){
.Call("CAAIlluminatedFraction_NeptuneMagnitudeMuller", r, Delta)
}
